home *** CD-ROM | disk | FTP | other *** search
/ Art Fundamentals - Core Concepts in Art / Art Fundamentals: Core Concepts in Art.iso / pc / color.dxr / 00170.ls < prev    next >
Encoding:
Text File  |  2001-07-16  |  463 b   |  14 lines
  1. on mouseUp me
  2.   global warmskyr, warmskyg, warmskyb, iconfade
  3.   showit(36, 38)
  4.   set the blend of sprite 48 to 100
  5.   set the blend of sprite 47 to 50
  6.   repeat with iconfade = 49 to 54
  7.     set the blend of sprite iconfade to 50
  8.   end repeat
  9.   set the memberNum of sprite 36 to 23
  10.   sprite(39).color = rgb(warmskyr, warmskyg, warmskyb)
  11.   sprite(48).color = rgb(warmskyr, warmskyg, warmskyb)
  12.   set the locH of sprite 38 to 439 + (warmskyg * 0.78400000000000003)
  13. end
  14.